* lisp/ibuf-ext.el (ibuffer-diff-buffer-with-file-1): Avoid buffer

read-only error.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 3f656ab999aa0a3980ce18196f1913b3e7d41e0d..8e826aa69faa7239f952dbcab8cb9d2bc5e32372 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2012-04-30  Leo Liu  <sdl.web@gmail.com>
+
+       * ibuf-ext.el (ibuffer-diff-buffer-with-file-1): Avoid buffer
+       read-only error.
+
 2012-04-29  Chong Yidong  <cyd@gnu.org>
 
        * follow.el (follow-calc-win-end): Rewrite to handle partial

diff --git a/lisp/ibuf-ext.el b/lisp/ibuf-ext.el
index f943bd2fe58797eac288d5ff6bb5191dc83deb72..58d38f77b66bdfa08187067fd262d04068bc799c 100644 (file)
--- a/lisp/ibuf-ext.el
+++ b/lisp/ibuf-ext.el
@@ -1356,8 +1356,8 @@ a prefix argument reverses the meaning of that variable."
                (diff-sentinel
                 (call-process shell-file-name nil
                               (current-buffer) nil
-                              shell-command-switch command)))
-             (insert "\n"))))
+                              shell-command-switch command))
+               (insert "\n")))))
       (sit-for 0)
       (when (file-exists-p tempfile)
        (delete-file tempfile)))))